Régions

Row

Row

Données générales

La population, plutôt âgée, baisse en Bourgogne-Franche-Comté entre 2013 et 2018. Cette baisse est particulièrement importante chez les jeunes (-0,72 %).

C’est la seule région de France métropolitaine à enregistrer une telle baisse. Elle est principalement dûe à la baisse rapide des populations rurales du Morvan, du Châtillonais et du nord Haute-Saône. L’arc jurassien et les métropoles régionales restent dynamiques

Row

Comparaisons régionales

Evolution 2013-2018
Région Nom Population 15-29 ans 65 ans et + évolution annuelle evo15/29 evo>65 evol68_18
11 Île-de-France 12 213 447 2 439 392 1 812 696 0,42 0,10 2,29
24 Centre-Val de Loire 2 572 853 410 356 572 546 0,02 -0,59 2,26
27 Bourgogne-Franche-Comté 2 807 807 453 625 640 205 -0,09 -0,72 2,40
28 Normandie 3 327 477 562 464 702 997 -0,01 -0,70 2,71
32 Hauts-de-France 6 004 108 1 109 830 1 067 409 0,05 -0,63 2,80
44 Grand Est 5 550 389 973 362 1 101 954 -0,01 -0,78 2,57
52 Pays de la Loire 3 783 665 642 421 770 435 0,65 0,24 2,99
53 Bretagne 3 335 414 545 690 735 593 0,47 -0,12 2,82
75 Nouvelle-Aquitaine 5 980 804 948 023 1 415 198 0,46 0,06 2,55
76 Occitanie 5 885 496 989 284 1 320 157 0,70 0,34 2,61
84 Auvergne-Rhône-Alpes 7 994 459 1 403 577 1 573 701 0,60 0,06 2,59
93 Provence-Alpes-Côte d’Azur 5 052 832 814 225 1 153 874 0,40 -0,57 2,28
94 Corse 338 554 50 438 78 797 1,12 -0,66 3,16
METRO METRO 64 847 305 11 342 686 12 945 562 0,36 -0,19 2,55
Source : Insee RP2013, RP2018

Carte régionale

Départements

Row

Row

Données générales

Seuls deux départements gagnent de la population entre 2013 et 2018 : la Côte d’Or et le Doubs, portés par l’attractivité de leurs capitales Dijon et Besançon.La Nièvre est le département où la population décroît le plus en 5 ans.

Row

Comparaisons départementales

Evolution 2013-2018
Région Département Nom Population 15-29 ans 65 ans et + évolution annuelle evo15/29 evo>65 evol68_18
27 21 Côte-d’Or 533 220 102 534 111 007 0,13 -0,18 2,71
27 25 Doubs 541 454 100 006 105 260 0,30 -0,57 2,72
27 39 Jura 259 746 38 508 60 604 -0,06 -0,54 2,43
27 58 Nièvre 205 828 27 385 59 763 -0,89 -1,75 1,58
27 70 Haute-Saône 236 018 34 086 53 469 -0,25 -0,85 2,65
27 71 Saône-et-Loire 552 185 77 620 140 878 -0,15 -0,79 2,13
27 89 Yonne 337 504 47 928 81 387 -0,23 -1,12 2,39
27 90 Territoire de Belfort 141 852 25 559 27 836 -0,34 -1,48 2,65
27 BFC Bourgogne-Franche-Comté 2 807 807 453 625 640 205 -0,09 -0,72 2,40
METRO METRO METRO 64 847 305 11 342 686 12 945 562 0,36 -0,19 2,55
Source : Insee RP2013, RP2018

Carte départementale

EPCI

Row

Row

Comparaisons établissements publics de coopération intercommunale

Evolution 2013-2018
EPCI Nom Population 15-29 ans 65 ans et + évolution annuelle evo15/29 evo>65 evol68_18
242100410 Dijon Métropole 253 859 62 759 49 131 0,47 0,27 2,41
242500361 CU Grand Besançon Métropole 194 382 45 218 36 562 0,24 -0,42 3,08
200065647 CA Pays de Montbéliard Agglomération 140 002 21 516 30 889 -0,17 -1,38 2,26
247100589 CA Le Grand Chalon 113 869 18 227 25 363 0,11 -0,83 2,65
200069052 CA Grand Belfort 103 016 19 884 19 749 -0,44 -1,53 2,51
247100290 CU Le Creusot Montceau-les-Mines 93 072 12 987 25 532 -0,77 -1,95 1,81
200070308 CA Mâconnais Beaujolais Agglomération 77 947 12 230 16 895 0,53 -0,57 2,16
200067114 CA de l’Auxerrois 68 050 10 814 16 018 -0,10 -0,74 3,26
245804406 CA de Nevers 65 707 10 704 16 652 -0,73 -2,02 1,86
200071140 CA Moulins Communauté 64 963 9 940 16 125 -0,03 -0,18 2,79
248900334 CA du Grand Sénonais 59 228 9 051 13 664 0,64 -0,53 2,64
200010650 CA du Grand Dole 54 595 8 486 12 473 0,43 -0,28 2,91
200006682 CA Beaune, Côte et Sud - Communauté Beaune-Chagny-Nolay 51 395 7 895 11 803 -0,48 -1,82 2,58
200071884 CC Le Grand Charolais 40 136 5 170 11 268 -0,13 -0,80 2,24
200070530 CC du Grand Autunois Morvan 35 592 4 713 10 225 -0,72 -0,60 1,44
200071116 CA ECLA (Espace Communautaire Lons Agglomération) 34 317 5 568 8 771 0,11 -0,23 2,46
200067130 CC de Puisaye-Forterre 34 228 3 930 10 303 -0,96 -2,08 1,57
247000011 CA de Vesoul 32 203 5 363 7 238 -0,35 -1,18 3,22
200070894 CC de Gevrey-Chambertin et de Nuits-Saint-Georges 29 743 4 293 5 885 -0,01 -0,64 3,30
200071579 CC Bresse Louhannaise Intercom’ 28 338 3 705 7 992 -0,10 0,15 2,17
242500338 CC du Grand Pontarlier 27 449 5 077 5 113 0,78 -0,01 2,33
242504181 CC des Portes du Haut-Doubs 26 166 4 806 4 236 1,08 0,51 2,46
200068070 CC Loue-Lison 25 335 3 528 5 596 0,41 0,82 3,20
200067916 CC Cœur de Loire 25 182 2 877 7 860 -1,09 -3,19 1,56
200090579 CC Terre d’Émeraude Communauté 24 791 3 313 5 695 -0,49 -0,57 1,91
248900896 CC Yonne Nord 24 468 3 493 5 074 0,34 0,88 3,26
200067304 CC Serein et Armance 24 133 3 491 5 397 -0,60 -1,17 2,82
249000241 CC du Sud Territoire 23 579 3 622 4 717 -0,07 -1,48 2,65
200070902 CC Auxonne Pontailler Val de Saône 23 383 3 640 4 556 0,13 -0,81 2,90
200069623 CC Champagnole Nozeroy Jura 22 675 3 276 5 675 0,14 0,45 1,59
200070316 CC Entre Arroux, Loire et Somme 22 458 2 480 7 193 -1,14 -1,98 1,75
200071538 CC Terres de Bresse 22 278 2 781 5 213 0,23 -0,19 2,56
200000925 CC de la Plaine Dijonnaise 22 004 3 447 3 536 0,05 -0,27 4,53
200071595 CC Arbois, Poligny, Salins, Cœur du Jura 21 840 3 233 5 686 -0,50 -1,26 1,78
247000722 CC du Pays d’Héricourt 21 051 3 027 4 507 0,19 -0,03 2,64
248900938 CC du Jovinien 21 038 3 112 4 955 -0,47 -1,47 1,81
242504116 CC du Val de Morteau 20 756 3 595 3 451 0,91 -0,47 2,15
200067700 CC Sud Nivernais 20 717 2 513 6 037 -1,22 -2,22 1,47
242101509 CC Rives de Saône 20 532 3 019 4 271 -0,24 -0,18 2,17
200036549 CC Val de Gray 20 494 3 079 5 158 -0,30 -0,26 2,13
200026573 CC Haut-Jura Saint-Claude 20 262 2 782 4 881 -1,51 -1,90 2,24
200067668 CC de la Cléry, du Betz et de l’Ouanne 20 191 2 517 5 137 -0,61 -1,16 1,78
200068088 CC Les Bertranges 20 033 2 427 5 754 -0,58 0,01 1,74
242101434 CC du Pays Châtillonnais 19 790 2 541 5 639 -0,89 -2,26 2,09
247000664 CC du Pays de Lure 19 616 2 999 4 235 -0,10 -0,21 2,69
200069615 CC Bresse Haute Seille 19 010 2 297 4 671 0,29 -0,48 3,33
200039758 CC Avallon, Vézelay, Morvan 18 786 2 460 5 141 -1,18 -2,49 1,95
200023075 CC du Pays de Maîche 18 604 2 819 3 529 0,17 -1,82 2,66
200041721 CC de la Haute Comté 17 760 2 343 4 475 -0,88 -3,13 2,96
248900748 CC du Gâtinais en Bourgogne 17 470 2 191 3 657 0,30 -0,73 2,57
200069565 CC des Lacs et Montagnes du Haut-Doubs 16 099 2 587 2 089 1,95 -1,07 3,91
242504447 CC du Doubs Baumois 15 991 2 292 3 438 -0,17 -0,71 3,12
200069540 CC Norge et Tille 15 968 2 092 3 051 0,62 -0,43 6,44
200068294 CC des Deux Vallées Vertes 15 958 2 088 3 696 -0,64 -2,53 2,60
200039642 CC Le Tonnerrois en Bourgogne 15 835 1 947 4 605 -1,49 -3,43 1,89
200071017 CC des Terres d’Auxois 15 815 2 266 3 974 -0,12 0,21 2,14
200069698 CC Mâconnais - Tournugeois 15 731 2 162 4 020 -0,26 -0,70 2,29
200067882 CC Bazois Loire Morvan 15 432 1 562 5 601 -1,07 -0,96 0,79
200070332 CC des Savoir-Faire 15 309 1 807 4 816 -0,85 -2,25 1,35
200069060 CC des Vosges du Sud 15 257 2 053 3 370 -0,13 -0,98 3,51
200070548 CC La Clayette Chauffailles en Brionnais 15 116 1 787 4 624 -0,37 -0,51 2,02
248900383 CC de l’Agglomération Migennoise 15 054 2 274 3 332 0,38 -0,81 2,62
247000755 CC du Pays de Luxeuil 14 950 2 391 3 569 -0,98 -2,61 1,75
200067080 CC Chablis Villages et Terroirs 14 934 2 081 3 443 -0,60 -1,14 1,14
200041887 CC du Val Marnaysien 14 340 2 102 2 536 0,79 0,02 3,86
200040293 CC du Clunisois 13 915 2 124 4 002 0,26 0,66 2,81
242100154 CC des Vallées de la Tille et de l’Ignon 13 631 1 983 2 466 0,31 0,32 3,64
200041879 CC Terres de Saône 13 180 1 757 2 753 -0,46 -2,58 2,18
247000706 CC du Pays Riolais 12 818 1 907 2 073 1,37 1,45 4,30
200072825 CC Mirebellois et Fontenois 12 604 1 691 2 495 0,38 0,70 4,08
200067890 CC Morvan Sommets et Grands Lacs 12 304 1 522 4 397 -1,07 -1,03 1,37
200067429 CC Haut Nivernais-Val d’Yonne 12 187 1 569 3 869 -1,51 -2,54 0,70
200040038 CC Saône Doubs Bresse 12 111 1 590 2 572 0,16 -0,62 2,55
247000821 CC Rahin et Chérimont 11 856 1 606 2 506 -0,42 -0,24 2,43
243900560 CC Jura Nord 11 659 1 750 2 118 0,48 0,48 3,01
247104094 CC Sud Côte Chalonnaise 11 480 1 366 2 685 -0,01 -0,66 2,71
247103765 CC Entre Saône et Grosne 11 224 1 523 2 660 -0,16 -0,05 2,46
200041861 CC du Triangle Vert 11 053 1 503 2 122 -0,19 -1,41 4,40
200039055 CC Ouche et Montagne 10 812 1 280 2 184 0,30 -1,97 4,75
242101491 CC du Montbardois 10 583 1 419 2 962 -0,95 -2,35 2,53
200072056 CC Porte du Jura 10 556 1 420 2 715 0,03 0,42 2,02
248900524 CC de l’Aillantais 10 386 1 366 2 300 -0,02 -0,18 2,68
200042414 CC Bresse Revermont 71 9 875 1 255 2 734 0,19 1,32 1,44
200067692 CC Tannay-Brinon-Corbigny 9 718 1 088 3 405 -0,77 -0,83 1,39
247000623 CC des Quatre Rivières 9 527 1 258 2 683 -0,84 -0,06 1,95
243900479 CC du Haut-Jura - ARCADE 9 276 1 713 1 562 -0,59 -2,89 1,19
243901089 CC de la Plaine Jurassienne 9 181 1 236 2 290 -0,33 -0,20 2,69
243900420 CC du Val d’Amour 9 084 1 392 2 124 -0,50 -1,79 3,12
248900664 CC de la Vanne et du Pays d’Othe 8 610 1 061 2 161 -0,30 -2,56 1,85
200067908 CC Amognes Cœur du Nivernais 8 580 1 042 2 221 -0,77 -2,78 2,26
200071207 CC de Pouilly-en-Auxois/Bligny-sur-Ouche 8 569 1 100 2 139 -0,34 0,48 2,56
200036150 CC des Hauts du Val de Saône 8 517 1 114 2 540 -0,81 -0,34 1,59
247000854 CC des 1000 étangs 8 472 1 017 2 292 -0,75 -1,14 2,13
200071645 CC Saint Cyr Mère Boitier entre Charolais et Mâconnais 8 020 990 2 001 0,45 0,71 2,04
247000714 CC du Pays de Villersexel 7 856 1 012 1 886 -0,25 -0,93 2,30
242500320 CC de Montbenoît 7 833 1 360 1 064 1,71 2,53 3,15
247000367 CC des Combes 7 631 1 032 1 651 0,26 0,27 3,11
242101459 CC du Pays d’Alésia et de la Seine 7 496 1 133 1 891 -0,59 -0,11 2,00
200039709 CC du Serein 7 247 883 1 999 -1,50 -3,82 0,69
245801063 CC Loire et Allier 7 186 981 1 620 -0,33 -0,52 4,05
200071173 CC du Pays Arnay Liernais 7 129 835 2 212 -0,88 -1,48 1,34
243900354 CC de la Station des Rousses-Haut Jura 7 115 1 258 954 1,79 1,76 4,12
200039063 CC Forêts, Seine et Suzon 6 997 925 1 707 0,89 0,81 4,04
242504355 CC du Plateau de Russey 6 688 1 101 956 1,37 0,38 2,81
200041853 CC du Pays de Montbozon et du Chanois 6 580 884 1 370 0,09 -0,85 3,14
247100647 CC Bresse Nord Intercom 6 539 770 2 015 -0,00 0,71 1,65
242504488 CC Altitude 800 6 390 1 045 1 152 0,85 0,06 2,92
247000698 CC des Monts de Gy 6 148 884 1 174 0,09 0,20 2,55
247100639 CC de Marcigny 6 140 669 1 832 -0,51 -1,51 0,99
242504496 CC du Plateau de Frasne et du Val de Drugeon (CFD) 6 040 1 038 894 0,95 0,35 2,47
242504371 CC du Pays de Sancey-Belleherbe 5 515 717 1 231 0,83 0,67 1,02
245804497 CC du Nivernais Bourbonnais 5 437 669 1 406 -1,10 0,20 0,89
243900610 CC La Grandvallière 5 385 782 987 0,08 -1,50 3,03
242101442 CC de Saulieu 5 301 752 1 617 -1,18 -1,14 0,33
247103864 CC du Canton de Semur-en-Brionnais 5 164 549 1 409 0,03 -1,52 2,81
200070910 CC Tille et Venelle 4 962 686 1 061 -0,26 -0,67 3,49
BFC Bourgogne-Franche-Comté 2 807 807 453 625 640 205 -0,09 -0,72 2,40
METRO METRO 64 847 305 11 342 686 12 945 562 0,36 -0,19 2,55 NA
Source : Insee RP2013, RP2018

Carte ECPI

Bassins de vie

Row

Row

Comparaisons bassins de vie

Evolution 2013-2018
BV2012 Nom Population 15-29 ans 65 ans et + évolution annuelle evo15/29 evo>65 evol68_18
21231 Dijon 309 177 70 127 60 394 0,46 0,20 2,80
25056 Besançon 185 536 43 509 34 833 0,25 -0,45 3,11
25388 Montbéliard 124 045 19 377 27 300 -0,13 -1,38 2,03
71076 Chalon-sur-Saône 110 717 17 832 24 216 0,16 -0,81 2,80
90010 Belfort 101 905 19 188 19 696 -0,39 -1,52 2,71
01053 Bourg-en-Bresse 101 884 17 126 21 602 0,64 -0,64 3,20
58194 Nevers 85 184 13 258 21 025 -0,68 -1,77 2,15
89024 Auxerre 79 765 12 378 18 626 -0,21 -0,87 3,14
71270 Mâcon 78 362 12 333 16 893 0,52 -0,54 2,19
77305 Montereau-Fault-Yonne 61 630 10 523 10 721 1,44 1,11 3,27
89387 Sens 59 660 9 003 13 453 0,71 -0,64 2,79
03190 Moulins 59 262 9 232 14 563 -0,10 -0,21 3,04
25462 Pontarlier 55 983 9 774 9 018 1,20 -0,04 2,68
70550 Vesoul 47 976 7 393 10 617 -0,21 -0,99 3,50
39300 Lons-le-Saunier 47 138 7 206 11 761 0,12 -0,07 2,54
01283 Oyonnax 46 590 7 342 8 358 -0,16 -0,33 3,36
71306 Montceau-les-Mines 46 589 6 185 12 964 -0,82 -2,07 1,56
39198 Dole 44 868 7 100 10 442 0,50 -0,16 3,34
71153 Le Creusot 40 042 5 791 11 182 -0,69 -1,84 1,92
21054 Beaune 39 324 6 135 8 828 -0,52 -1,76 2,78
58086 Cosne-Cours-sur-Loire 31 687 3 673 9 782 -0,89 -2,78 1,70
88383 Remiremont 31 314 4 880 7 225 -0,24 -0,91 3,12
70311 Luxeuil-les-Bains 29 573 4 288 7 215 -0,84 -2,26 2,19
21038 Auxonne 28 208 4 247 5 793 0,17 -0,47 2,59
25411 Morteau 28 059 4 838 4 419 1,05 -0,05 2,64
70310 Lure 26 190 3 871 5 712 -0,24 -0,23 2,81
71073 Chagny 25 462 3 571 5 710 -0,17 -1,28 2,64
71014 Autun 25 395 3 503 7 214 -0,75 -0,62 1,34
70279 Gray 24 620 3 618 5 892 -0,22 -0,67 2,21
58095 Decize 24 566 2 950 7 350 -1,05 -1,98 1,48
71263 Louhans 24 510 3 100 7 064 0,01 -0,24 2,08
39478 Saint-Claude 24 419 3 407 5 716 -1,38 -1,85 2,07
89025 Avallon 24 211 3 196 6 462 -1,28 -2,98 1,83
10034 Bar-sur-Seine 23 940 3 451 5 638 -0,59 -1,29 2,13
25356 Maîche 23 619 3 685 4 325 0,54 -1,21 2,39
25578 Valdahon 23 380 4 378 3 773 1,22 0,83 2,08
21317 Is-sur-Tille 23 022 3 253 4 393 0,14 0,07 3,41
70285 Héricourt 22 945 3 235 4 984 0,22 -0,12 2,77
89257 Migennes 22 719 3 383 4 950 0,24 -1,06 2,78
01305 Pont-de-Vaux 22 526 3 032 5 011 0,35 -0,35 2,44
90033 Delle 22 503 3 842 4 167 -0,22 -1,14 2,56
25527 Saint-Vit 22 310 3 493 3 983 0,67 -0,05 3,76
89345 Saint-Florentin 21 956 2 974 5 438 -0,52 -1,02 2,06
21292 Genlis 21 558 3 378 3 471 0,15 -0,15 4,67
39097 Champagnole 20 039 2 865 5 136 0,17 0,50 1,63
58059 La Charité-sur-Loire 19 622 2 307 5 701 -0,73 -1,33 1,59
70467 Saint-Loup-sur-Semouse 19 418 2 382 5 063 -0,88 -3,41 2,61
39475 Saint-Amour 19 337 2 544 5 217 -0,02 0,28 2,09
58079 Clamecy 19 144 2 318 6 195 -1,03 -1,49 0,97
21154 Châtillon-sur-Seine 19 124 2 443 5 586 -0,92 -1,96 2,00
71090 La Chapelle-de-Guinchay - Crêches-sur-Saône 18 517 2 623 3 590 0,72 0,20 2,87
68068 Dannemarie 18 229 2 737 3 440 0,22 -0,65 3,24
42052 Charlieu 18 060 2 451 4 386 0,09 -0,33 2,92
89464 Villeneuve-sur-Yonne 17 669 2 331 4 189 -0,15 -1,41 2,29
77051 Bray-sur-Seine 17 571 2 680 3 617 -0,27 -0,53 2,48
88468 Le Thillot 17 165 2 171 4 776 -0,66 -1,58 2,05
71230 Gueugnon 16 725 1 896 5 056 -0,91 -1,77 2,01
25532 Saône 16 724 2 639 3 198 0,25 0,72 3,66
25047 Baume-les-Dames 16 634 2 348 3 549 -0,17 -1,13 2,90
21464 Nuits-Saint-Georges 16 632 2 392 3 344 -0,05 -0,76 3,45
45115 Courtenay 16 486 2 085 4 277 -0,38 -0,18 1,56
71137 Cluny 16 169 2 387 4 249 0,39 0,09 2,64
89418 Tonnerre 15 374 1 856 4 518 -1,49 -3,22 1,58
10003 Aix-en-Othe 15 346 2 023 3 798 -0,32 0,59 1,90
89206 Joigny 15 257 2 350 3 517 -0,46 -1,35 1,45
68201 Masevaux 15 219 2 147 3 301 -0,22 -1,64 3,23
71342 Paray-le-Monial 15 141 2 032 4 567 0,21 -0,23 2,45
71176 Digoin 14 340 1 871 3 796 -0,45 -1,50 1,98
21607 Seurre 14 242 1 999 3 249 -0,31 -0,26 1,42
25315 L’Isle-sur-le-Doubs 13 862 1 810 3 197 -0,57 -1,50 2,82
25463 Pont-de-Roide-Vermondans 13 249 1 738 3 113 -0,30 -2,06 3,51
21554 Saint-Jean-de-Losne 12 964 1 979 2 526 -0,34 -0,23 2,43
70561 Villersexel 12 865 1 708 3 006 -0,30 -1,73 2,29
70447 Rioz 12 654 1 946 2 169 0,95 1,79 3,32
39434 Poligny 12 637 2 076 3 040 -0,23 -0,52 1,67
25434 Ornans 12 612 1 759 3 043 0,33 0,60 2,80
21425 Montbard 12 587 1 654 3 576 -1,17 -2,72 2,26
71120 Chauffailles 12 529 1 493 3 637 -0,45 -0,55 1,90
89309 Pont-sur-Yonne 12 451 1 717 2 713 0,31 -0,25 2,61
71543 Tournus 12 400 1 632 3 385 -0,56 -1,41 2,08
45085 Châtillon-Coligny 12 371 1 691 3 312 -0,58 -1,31 1,33
03102 Dompierre-sur-Besbre 12 368 1 439 3 404 -0,57 -1,17 1,89
21603 Semur-en-Auxois 12 245 1 856 2 965 -0,07 0,47 2,28
71133 La Clayette 11 916 1 411 3 542 -0,18 -0,43 1,73
70198 Dampierre-sur-Salon 11 816 1 612 3 210 -0,53 0,70 2,03
18241 Sancerre 11 614 1 376 3 359 -0,73 -2,45 1,47
39526 Tavaux 11 396 1 648 2 578 -0,12 -0,42 1,77
39056 Bletterans 11 250 1 381 2 608 0,53 -1,09 3,26
39368 Morez 11 166 2 009 1 889 -0,53 -2,50 1,43
21584 Saulieu 11 163 1 357 3 686 -0,97 -0,91 0,85
39500 Salins-les-Bains 11 030 1 395 2 886 -0,37 -1,03 2,35
89003 Aillant-sur-Tholon 10 854 1 410 2 395 0,07 -0,30 2,97
70120 Champagney - Ronchamp 10 834 1 483 2 287 -0,59 -0,12 2,18
90009 Beaucourt 10 797 1 588 2 382 -0,34 -2,54 2,74
71419 Saint-Germain-du-Bois 10 592 1 357 2 939 -0,00 1,69 1,72
39128 Chaussin 10 262 1 368 2 532 -0,30 -0,41 2,75
39154 Clairvaux-les-Lacs 10 164 1 308 2 411 -0,18 -0,21 1,81
39013 Arbois 9 991 1 425 2 556 -0,62 -2,53 2,12
89419 Toucy 9 898 1 301 2 482 -0,76 -1,26 2,11
58083 Corbigny 9 845 1 043 3 517 -0,77 -1,36 1,72
71047 Bourbon-Lancy 9 588 1 027 3 066 -1,10 -2,69 1,33
71310 Montchanin 9 582 1 363 2 276 -0,76 -1,45 2,60
21501 Pouilly-en-Auxois 9 552 1 173 2 209 0,11 0,24 3,16
21663 Venarey-les-Laumes 9 113 1 323 2 324 -0,55 -0,97 1,69
71106 Charolles 8 894 1 110 2 473 0,03 0,79 2,28
89368 Saint-Sauveur-en-Puisaye 8 810 853 3 076 -1,45 -3,49 1,10
71275 Marcigny 8 572 907 2 660 -0,47 -1,77 1,45
71512 Sennecey-le-Grand 8 304 1 180 1 847 -0,26 -0,29 2,36
70334 Marnay 8 234 1 239 1 378 0,69 0,87 3,33
71417 Saint-Gengoux-le-National 7 902 892 2 308 -0,17 0,08 2,52
21023 Arnay-le-Duc 7 874 928 2 357 -0,89 -1,45 1,31
70421 Port-sur-Saône 7 854 1 133 1 520 -0,23 -2,29 2,79
70292 Jussey 7 586 958 2 249 -1,06 -1,16 1,45
89068 Chablis 7 288 1 058 1 543 -0,61 -1,77 1,30
71158 Cuisery 7 260 899 1 788 0,13 0,22 1,31
58182 Moulins-Engilbert 7 103 726 2 573 -1,29 -2,50 0,69
90052 Giromagny 6 701 913 1 663 -0,67 -0,52 2,88
58134 Imphy 6 661 853 1 680 -1,15 -2,40 1,59
89086 Charny 6 639 747 2 116 -1,33 -3,05 1,21
58062 Château-Chinon (Ville) 6 605 980 2 262 -1,17 -0,15 0,77
39487 Saint-Laurent-en-Grandvaux 6 496 932 1 238 0,00 -1,60 2,93
71070 Buxy 6 449 754 1 431 -0,04 -2,37 2,92
71351 Pierre-de-Bresse 6 302 732 1 915 -0,04 -0,15 1,57
71221 Givry 6 098 734 1 458 0,04 -0,55 3,11
71192 Étang-sur-Arroux 6 050 733 1 764 -0,56 -0,17 1,67
58149 Luzy 5 392 582 2 038 -1,11 1,42 0,81
58264 Saint-Pierre-le-Moûtier 5 092 630 1 355 -0,83 1,45 0,48
52197 Fayl-Billot 4 903 598 1 517 -0,84 -1,81 1,18
39470 Les Rousses 4 833 913 574 2,42 3,05 4,16
25334 Levier 4 577 741 840 0,60 -1,28 2,96
58218 Prémery 4 388 453 1 478 -0,72 -0,24 0,90
BFC Bourgogne-Franche-Comté 2 807 807 453 625 640 205 -0,09 -0,72 2,40
METRO METRO 64 847 305 11 342 686 12 945 562 0,36 -0,19 2,55 NA
Source : Insee RP2013, RP2018

Carte BV

En savoir +

Row

Row

Sources :

---
title: "Evolution"
output: 
  flexdashboard::flex_dashboard:
    orientation: rows
    social: menu
    source_code: embed
    navbar:
      - { title: "Accueil", href: DRAJESBFC.html, align: right, icon: fa-home }
    theme: simplex
---
 
 
```{r setup, include=FALSE ,echo=F, cache=F} 
#library(flexdashboard)
library(sparkline)
#source("librairies.R")
#load("data/demo/basecom.RData")
#load("data/demo/tab_demo.RData")
#load("data/demo/cartes.RData")

pal3 <- colorBin("RdYlBu", domain =-5:5 ,bins=c(-Inf, -1, -0.5,0,0.5, 1 , Inf), reverse = T)

```

![](images/BFC_s.svg) Régions {data-orientation="rows" height=30}
=======================================================================
Row {data-height="20"}
-----------------------------------------------------------------------

Row  {data-height=100}
-----------------------------------------------------------------------
### Données générales

La population, plutôt âgée, **baisse** en Bourgogne-Franche-Comté entre 2013 et 2018. 
Cette baisse est particulièrement importante chez les jeunes (**`r prettyNum(round(region$evol1529,2)[3],decimal.mark=",")` %**).

C'est la seule région de France métropolitaine à enregistrer une telle baisse. Elle est principalement dûe à la baisse rapide des populations rurales du Morvan, du Châtillonais et du nord Haute-Saône. L'arc jurassien et les métropoles régionales restent dynamiques

Row {.tabset .tabset-fade}
-----------------------------------------------------------------------
  
### Comparaisons régionales
  
```{r,echo=F}
load("data/demo/spark.RData")
sparkline(0)

region_tab %>%
  select(Région,Nom,Population,`15-29 ans`,`65 ans et +`,`évolution annuelle`, `evo15/29`,`evo>65`) %>%
  mutate(" "= if_else(substr(str_split_fixed(region_tab$`évolution annuelle`,"<*>",3)[,2],1,4)   < 0,
                 cell_spec('![](images/arrow-down-right.svg)',
                           color="red") ,
                 cell_spec('![](images/arrow-up-right.svg)',
                           color="green")
                 ) ) %>%
  relocate(" ",.before=`évolution annuelle`) %>%
  left_join(.,serie_reg,by=c("Région" = "REG") ) %>%
  kable("html", format.args = list(decimal.mark = ",", big.mark = " "),
      align="clrrrrlllc",
      escape = F) %>% 
  kable_styling("hover", full_width = F) %>%
  row_spec(which(region$REG=='27'),background = "#E0FFFF75",  bold = T , color = "steelblue")%>%
  row_spec(nrow(region_tab),bold = T,color = "navy") %>%  
  add_header_above(c(" " = 5, "Evolution 2013-2018" = 4," ")) %>%
  footnote(general = " Insee RP2013, RP2018", general_title = "Source : ", footnote_as_chunk = T) 

```   



### Carte régionale

```{r,echo=F}

leaflet(regwgs) %>%  addProviderTiles(providers$CartoDB.Positron) %>%
  setView(lng = 5.1, lat = 47.27, zoom = 6) %>%
  addPolygons(fill =F , weight = 2,opacity = 0.6,
              color = "#2F4F4F",fillOpacity = 0.7 ) %>%
  addPolygons(data=reg27carto,group  = "BFC",fill = F,color="#9370DB",weight = 5,opacity = 1) %>%
  addCircles(centroid(regwgs)[,1],centroid(regwgs)[,2],weight=4,
             radius = ~50*pop^(1/2), color = "#4169E1",
             fillColor = ~pal3(evol), fillOpacity = 0.7,
             highlight = highlightOptions (fillOpacity =  0.5,
                                           weight = 5,   color = "#00FFFF"),
             popup = popupTable(regwgs@data %>% 
                                  select(Région=INSEE_REG) %>%
                                  left_join(.,region_tab %>%
                                              select(Région,Nom,Population,`15-29 ans`,`65 ans et +`,`évolution annuelle`, `evo15/29`,`evo>65`)
                                            ,by="Région"),
                                feature.id=F,row.numbers = F) )%>%
    addLegend(pal = pal3, values =  regwgs$evol, opacity = 0.7, title = "évolution annuelle", position = "bottomright",labFormat = labelFormat(suffix =  " %"))
```

![](images/BFC_dep_s.svg) Départements {data-orientation="rows" height=30}
=======================================================================
Row {data-height="20"}
-----------------------------------------------------------------------
Row  {data-height=100}
-----------------------------------------------------------------------
### Données générales

Seuls deux départements gagnent de la population entre 2013 et 2018 : la Côte d'Or et le Doubs, portés par l'attractivité de leurs capitales Dijon et Besançon.La Nièvre est le département où la population décroît le plus en 5 ans.

  Row {.tabset .tabset-fade}
-----------------------------------------------------------------------

### Comparaisons départementales 

```{r,echo=F}

as.data.frame(dep27_tab) %>%  
  select(Région,Département,Nom,Population,`15-29 ans`,`65 ans et +`,`évolution annuelle`, `evo15/29`,`evo>65`) %>%
mutate(" "= if_else(substr(str_split_fixed(dep27_tab$`évolution annuelle`,"<*>",3)[,2],1,4)   < 0,
                 cell_spec('![](images/arrow-down-right.svg)',
                           color="red") ,
                 cell_spec('![](images/arrow-up-right.svg)',
                           color="green")
                 ) ) %>%
  relocate(" ",.before=`évolution annuelle`) %>%
    left_join(.,serie_dep[,2:3],by=c("Département" = "DEP") ) %>%
  kable("html", format.args = list(decimal.mark = ",", big.mark = " "),
      align="cclrrrrlllc",
      escape = F) %>% 
  kable_styling("hover", full_width = F) %>%
  row_spec(nrow(dep27_tab)-1,bold = T,color = "steelblue") %>%
  row_spec(nrow(dep27_tab),bold = T,color = "navy") %>%
  add_header_above(c(" " = 6, "Evolution 2013-2018" =4," ")) %>%
  footnote(general = " Insee RP2013, RP2018", general_title = "Source : ", footnote_as_chunk = T) 


```


### Carte départementale

```{r,echo=F}

leaflet(depwgs) %>%  addProviderTiles(providers$CartoDB.Positron) %>%
  setView(lng = 5.1, lat = 47.27, zoom = 6) %>%
  addPolygons(fill =F , weight = 2,opacity = 0.6,
              color = "#2F4F4F",fillOpacity = 0.7 )%>%
  addPolygons(data=reg27carto,group  = "BFC",fill = F,color="#9370DB",weight = 5,opacity = 1) %>%
  addPolygons(data=dep27carto,group  = "départements",fill = F,color="#9370DB",weight = 3,opacity = 1) %>%
  addCircles(centroid(depwgs)[,1],centroid(depwgs)[,2],weight=4,
             radius = ~50*pop^(1/2), color = "#4169E1",
             fillColor = ~pal3(evol), fillOpacity = 0.7,
             highlight = highlightOptions (fillOpacity =  0.5,
                                           weight = 5,   color = "#00FFFF"),
             popup = popupTable(depwgs@data %>% 
                                  select(Département=INSEE_DEP) %>%
                                  left_join(.,dep_tab %>%
                                              select(Région,Département,Nom,Population,`15-29 ans`,`65 ans et +`,`évolution annuelle`, `evo15/29`,`evo>65`)
                                            ,by="Département"),
                                feature.id=F,row.numbers = F) )%>%
    addLegend(pal = pal3, values =  regwgs$evol, opacity = 0.7, title = "évolution annuelle", position = "bottomright",labFormat = labelFormat(suffix =  " %"))
```


![](images/BFC_EPCI_s.svg) EPCI {data-orientation="rows" height=30}
=======================================================================
Row {data-height="20"}
-----------------------------------------------------------------------

  Row {.tabset .tabset-fade}
-----------------------------------------------------------------------

### Comparaisons établissements publics de coopération intercommunale
  
```{r,echo=F}
epci27_tab %>% 
  select(EPCI,Nom,Population,`15-29 ans`,`65 ans et +`,`évolution annuelle`, `evo15/29`,`evo>65`) %>%
mutate(" "= if_else(substr(str_split_fixed(epci27_tab$`évolution annuelle`,"<*>",3)[,2],1,4)   < 0,
                 cell_spec('![](images/arrow-down-right.svg)',
                           color="red") ,
                 cell_spec('![](images/arrow-up-right.svg)',
                           color="green")
                 ) ) %>%
  relocate(" ",.before=`évolution annuelle`) %>%
    left_join(.,serie_epci,by= "EPCI" ) %>%
  kable("html", format.args = list(decimal.mark = ",", big.mark = " "),
      align="clrrrrlllc",
      escape = F) %>% 
  kable_styling("hover", full_width = F) %>%
  row_spec(nrow(epci27_tab)-1,bold = T,color = "steelblue") %>%
  row_spec(nrow(epci27_tab),bold = T,color = "navy") %>%
  add_header_above(c(" " = 5, "Evolution 2013-2018" =4," ")) %>%
  footnote(general = " Insee RP2013, RP2018", general_title = "Source : ", footnote_as_chunk = T)
```



### Carte ECPI
  
```{r,echo=F}

leaflet(epcicarto) %>%  addProviderTiles(providers$CartoDB.Positron) %>%
  setView(lng = 5.1, lat = 47.27, zoom = 8) %>%
  addPolygons(fill =F , weight = 2,opacity = 0.6,
              color = "#2F4F4F",fillOpacity = 0.7 ) %>%
  addPolygons(data=reg27carto,group  = "BFC",fill = F,color="#9370DB",weight = 5,opacity = 1) %>%
  addPolygons(data=dep27carto,group  = "départements",fill = F,color="#9370DB",weight = 3,opacity = 1) %>%
  addCircles(centroid(epcicarto)[,1],centroid(epcicarto)[,2],weight=4,
             radius = ~50*pop^(1/2), color = "#4169E1",
             fillColor = ~pal3(evol), fillOpacity = 0.7,
             highlight = highlightOptions (fillOpacity =  0.5,
                                           weight = 5,   color = "#00FFFF"),
             popup = popupTable(epcicarto@data %>% 
                                  select(EPCI=CODE_EPCI) %>%
                                  left_join(.,epci27_tab %>%
                                              select(EPCI,Nom,Population,`15-29 ans`,`65 ans et +`,`évolution annuelle`, `evo15/29`,`evo>65`)
                                            ,by="EPCI"),
                                feature.id=F,row.numbers = F) )%>%
    addLegend(pal = pal3, values =  regwgs$evol, opacity = 0.7, title = "évolution annuelle", position = "bottomright",labFormat = labelFormat(suffix =  " %"))
```

![](images/BFC_BV_s.svg) Bassins de vie {data-orientation="rows" height=30}
=======================================================================
Row {data-height="20"}
-----------------------------------------------------------------------
  
  Row {.tabset .tabset-fade}
-----------------------------------------------------------------------
  
### Comparaisons bassins de vie
```{r,echo=F}
bv27_tab %>%  
  select(BV2012,Nom,Population,`15-29 ans`,`65 ans et +`,`évolution annuelle`, `evo15/29`,`evo>65`) %>%
mutate(" "= if_else(substr(str_split_fixed(bv27_tab$`évolution annuelle`,"<*>",3)[,2],1,4)   < 0,
                 cell_spec('![](images/arrow-down-right.svg)',
                           color="red") ,
                 cell_spec('![](images/arrow-up-right.svg)',
                           color="green")
                 ) ) %>%
  relocate(" ",.before=`évolution annuelle`) %>%
    left_join(.,serie_bv,by="BV2012" ) %>%
  kable("html", format.args = list(decimal.mark = ",", big.mark = " "),
      align="clrrrrlllc",
      escape = F) %>% 
  kable_styling("hover", full_width = F) %>%
  row_spec(nrow(bv27_tab)-1,bold = T,color = "steelblue") %>%
  row_spec(nrow(bv27_tab),bold = T,color = "navy") %>%
  add_header_above(c(" " = 5, "Evolution 2013-2018" =4," ")) %>%
  footnote(general = " Insee RP2013, RP2018", general_title = "Source : ", footnote_as_chunk = T) 
```  
  

  
### Carte BV

```{r,echo=F}

leaflet(bvcarto) %>%  addProviderTiles(providers$CartoDB.Positron) %>%
  setView(lng = 5.1, lat = 47.27, zoom = 8) %>%
  addPolygons(fill =F , weight = 2,opacity = 0.6,
              color = "#2F4F4F",fillOpacity = 0.7 ) %>%
  addPolygons(data=reg27carto,group  = "BFC",fill = F,color="#9370DB",weight = 5,opacity = 1) %>%
  addPolygons(data=dep27carto,group  = "départements",fill = F,color="#9370DB",weight = 3,opacity = 1) %>%
  addCircles(centroid(bvcarto)[,1],centroid(bvcarto)[,2],weight=4,
             radius = ~50*pop^(1/2), color = "#4169E1",
             fillColor = ~pal3(evol), fillOpacity = 0.7,
             highlight = highlightOptions (fillOpacity =  0.5,
                                           weight = 5,   color = "#00FFFF"),
             popup = popupTable(bvcarto@data %>% 
                                  select(BV2012) %>%
                                  left_join(.,bv27_tab %>%
                                              select(BV2012,Nom,Population,`15-29 ans`,`65 ans et +`,`évolution annuelle`, `evo15/29`,`evo>65`)
                                            ,by="BV2012"),
                                feature.id=F,row.numbers = F) )%>%
  
  addLegend(pal = pal3, values =  regwgs$evol, opacity = 0.7, title = "évolution annuelle", position = "bottomright",labFormat = labelFormat(suffix =  " %"))
```



*En savoir* **+** {data-orientation="rows" data-icon="fa-info-circle" font-size="25px" }
=======================================================================
Row {data-height="20"}
-----------------------------------------------------------------------
Row {data-height="60"}
-----------------------------------------------------------------------

**Sources :**  

* Insee, Recensement de la population 2018

  + https://www.insee.fr/fr/information/5369871
  + https://www.insee.fr/fr/information/2837787